home *** CD-ROM | disk | FTP | other *** search
/ BCI NET 2 / BCI NET 2.iso / archives / programming / amos / amoslist-1294.lzh / AMOSLIST / text0052.txt < prev    next >
Encoding:
Text File  |  1995-01-03  |  908 b   |  38 lines
  1. Hey Andy (Church),
  2.                   Is the following a bug or is it supposed to happen?
  3.  
  4. I wrote a test program using the demo intuition extension.  Obviously, I can't
  5. close a screen after the program ends, but, after compiling my test program,
  6. the screen to back gadget causes instant guru.
  7.  
  8. Code is as follows:
  9.  
  10. Amos To Back
  11. Iscreen Open 1,640,200,2,Hires,"Demo"
  12. Icls : Ilocate0,1
  13. Iink 1
  14. Iwrite
  15. Icentre "Hello. Welcome to the test."
  16. Iwrite : Iwrite
  17. Icentre "Enter something to end the demo."
  18. A$=""
  19. 1 A$=Iread Char$
  20. If A$="" Then Goto 1
  21. Iwrite A$
  22. If A$=Chr$(13) Then Goto 2
  23. Goto 1
  24. 2 Icls
  25. Amos To Front
  26. End
  27.  
  28. Also, when I used Iread Str$, it gave me no input, but if I ran the program
  29. again, whatever I typed from the last run appeared.
  30.  
  31. Is the guru because the screen remains open but the program for it is gone?
  32.  
  33. Any ideas about the Iread Str$ problem?
  34.  
  35. Well met and godspeed,
  36.                       Giark
  37.  
  38.